home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 24 / Amiga Format AFCD24 (Feb 1998, Issue 108).iso / -in_the_mag- / emulation / amiga / uae-0.7.0b2 / src / include / newcpu.h < prev    next >
C/C++ Source or Header  |  1998-01-20  |  8KB  |  318 lines
  1.  /*
  2.   * UAE - The Un*x Amiga Emulator
  3.   *
  4.   * MC68000 emulation
  5.   *
  6.   * Copyright 1995 Bernd Schmidt
  7.   */
  8.  
  9. extern int areg_byteinc[];
  10. extern int imm8_table[];
  11.  
  12. extern int movem_index1[256];
  13. extern int movem_index2[256];
  14. extern int movem_next[256];
  15.  
  16. extern int fpp_movem_index1[256];
  17. extern int fpp_movem_index2[256];
  18. extern int fpp_movem_next[256];
  19.  
  20. extern int broken_in;
  21.  
  22. typedef void cpuop_func(uae_u32) REGPARAM;
  23.  
  24. struct cputbl {
  25.     cpuop_func *handler;
  26.     int specific;
  27.     uae_u16 opcode;
  28. };
  29.  
  30. extern void op_illg(uae_u32) REGPARAM;
  31.  
  32. typedef char flagtype;
  33.  
  34. /* Arrrghh.. */
  35. #if !defined NO_PREFETCH_BUFFER && !defined USE_POINTER
  36. #define USE_POINTER
  37. #endif
  38. #if defined USE_COMPILER && !defined USE_POINTER
  39. #define USE_POINTER
  40. #endif
  41.  
  42. extern struct regstruct
  43. {
  44.     uae_u32 regs[16];
  45.     uaecptr  usp,isp,msp;
  46.     uae_u16 sr;
  47.     flagtype t1;
  48.     flagtype t0;
  49.     flagtype s;
  50.     flagtype m;
  51.     flagtype x;
  52.     flagtype stopped;
  53.     int intmask;
  54.     uae_u32 pc;
  55. #ifdef USE_POINTER
  56.     uae_u8 *pc_p;
  57.     uae_u8 *pc_oldp;
  58. #endif
  59.  
  60.     uae_u32 vbr,sfc,dfc;
  61.  
  62.     double fp[8];
  63.     uae_u32 fpcr,fpsr,fpiar;
  64.  
  65.     uae_u32 spcflags;
  66.     uae_u32 kick_mask;
  67. #if !defined NO_PREFETCH_BUFFER
  68.     /* Fellow sources say this is 4 longwords. That's impossible. It needs
  69.      * to be at least a longword. The HRM has some cryptic comment about two
  70.      * instructions being on the same longword boundary.
  71.      * The way this is implemented now seems like a good compromise.
  72.      */
  73.     uae_u32 prefetch;
  74. #endif
  75. } regs, lastint_regs;
  76.  
  77. #define m68k_dreg(r,num) ((r).regs[(num)])
  78. #define m68k_areg(r,num) ((r).regs[(num)+8])
  79.  
  80. #ifdef USE_POINTER
  81.  
  82. #define get_ibyte_1(o) get_byte(regs.pc + (regs.pc_p - regs.pc_oldp) + (o) + 1)
  83. #define get_iword_1(o) get_word(regs.pc + (regs.pc_p - regs.pc_oldp) + (o))
  84. #define get_ilong_1(o) get_long(regs.pc + (regs.pc_p - regs.pc_oldp) + (o))
  85.  
  86. #ifdef NO_PREFETCH_BUFFER
  87.  
  88. #define get_ibyte(o) do_get_mem_byte((uae_u8 *)(regs.pc_p + (o) + 1))
  89. #define get_iword(o) do_get_mem_word((uae_u16 *)(regs.pc_p + (o)))
  90. #define get_ilong(o) do_get_mem_long((uae_u32 *)(regs.pc_p + (o)))
  91.  
  92. #else
  93.  
  94. static __inline__ uae_u32 get_ibyte(uae_s32 o)
  95. {
  96.     if (o > 3 || o < 0)
  97.     return do_get_mem_byte((uae_u8 *)(regs.pc_p + o + 1));
  98.  
  99.     return do_get_mem_byte((uae_u8 *)(((uae_u8 *)®s.prefetch) + o + 1));
  100. }
  101. static __inline__ uae_u32 get_iword(uae_s32 o)
  102. {
  103.     if (o > 3 || o < 0)
  104.     return do_get_mem_word((uae_u16 *)(regs.pc_p + o));
  105.  
  106.     return do_get_mem_word((uae_u16 *)(((uae_u8 *)®s.prefetch) + o));
  107. }
  108. static __inline__ uae_u32 get_ilong(uae_s32 o)
  109. {
  110.     if (o > 3 || o < 0)
  111.     return do_get_mem_long((uae_u32 *)(regs.pc_p + o));
  112.     if (o == 0)
  113.     return do_get_mem_long(®s.prefetch);
  114.     return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4));
  115. }
  116.  
  117. #endif /* NO_PREFETCH_BUFFER */
  118.  
  119. #define m68k_incpc(o) (regs.pc_p += (o))
  120.  
  121. #else /* not USE_POINTER */
  122.  
  123. #define get_ibyte(o) get_byte(regs.pc + (o) + 1)
  124. #define get_iword(o) get_word(regs.pc + (o))
  125. #define get_ilong(o) get_long(regs.pc + (o))
  126. #define get_ibyte_1(o) get_ibyte
  127. #define get_iword_1(o) get_iword
  128. #define get_ilong_1(o) get_ilong
  129. #define m68k_incpc(o) (regs.pc += (o))
  130.  
  131. #endif /* not USE_POINTER */
  132.  
  133. #ifdef NO_PREFETCH_BUFFER
  134.  
  135. #define fill_prefetch_0() do { (void)0; } while (0)
  136. #define fill_prefetch_2() do { (void)0; } while (0)
  137.  
  138. #else
  139.  
  140. static __inline__ void fill_prefetch_0(void)
  141. {
  142.     uae_u32 r;
  143. #ifdef UNALIGNED_PROFITABLE
  144.     r = *(uae_u32 *)regs.pc_p;
  145.     regs.prefetch = r;
  146. #else
  147.     r = do_get_mem_long ((uae_u32 *)regs.pc_p);
  148.     do_put_mem_long (®s.prefetch, r);
  149. #endif
  150. }
  151.  
  152. #if 0
  153. static __inline__ void fill_prefetch_2(void)
  154. {
  155.     uae_u32 r = do_get_mem_long (®s.prefetch) << 16;
  156.     uae_u32 r2 = do_get_mem_word (((uae_u16 *)regs.pc_p) + 1);
  157.     r |= r2;
  158.     do_put_mem_long (®s.prefetch, r);
  159. }
  160. #else
  161. #define fill_prefetch_2 fill_prefetch_0
  162. #endif
  163.  
  164. #endif /* not NO_PREFETCH_BUFFER */
  165.  
  166. static __inline__ uae_u32 nextibyte(void)
  167. {
  168.     uae_u32 r = get_ibyte(0);
  169.     m68k_incpc(2);
  170.     fill_prefetch_2();
  171.     return r;
  172. }
  173.  
  174. static __inline__ uae_u32 nextiword(void)
  175. {
  176.     uae_u32 r = get_iword(0);
  177.     m68k_incpc(2);
  178.     fill_prefetch_2();
  179.     return r;
  180. }
  181.  
  182. static __inline__ uae_u32 nextilong(void)
  183. {
  184.     uae_u32 r = get_ilong(0);
  185.     m68k_incpc(4);
  186.     fill_prefetch_0();
  187.     return r;
  188. }
  189.  
  190. #ifdef USE_POINTER
  191.  
  192. #if !defined(USE_COMPILER)
  193. static __inline__ void m68k_setpc(uaecptr newpc)
  194. {
  195.     regs.pc_p = regs.pc_oldp = get_real_address(newpc);
  196.     regs.pc = newpc;
  197.     fill_prefetch_0();
  198. }
  199. #else
  200. extern void m68k_setpc(uaecptr newpc);
  201. #endif
  202.  
  203. static __inline__ uaecptr m68k_getpc(void)
  204. {
  205.     return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp);
  206. }
  207.  
  208. #else
  209.  
  210. static __inline__ void m68k_setpc(uaecptr newpc)
  211. {
  212.     regs.pc = newpc;
  213. }
  214.  
  215. static __inline__ uaecptr m68k_getpc(void)
  216. {
  217.     return regs.pc;
  218. }
  219. #endif
  220.  
  221. #ifdef USE_COMPILER
  222. extern void m68k_setpc_fast(uaecptr newpc);
  223. extern void m68k_setpc_bcc(uaecptr newpc);
  224. extern void m68k_setpc_rte(uaecptr newpc);
  225. #else
  226. #define m68k_setpc_fast m68k_setpc
  227. #define m68k_setpc_bcc  m68k_setpc
  228. #define m68k_setpc_rte  m68k_setpc
  229. #endif
  230.  
  231. static __inline__ void m68k_setstopped(int stop)
  232. {
  233.     regs.stopped = stop;
  234.     if (stop)
  235.     regs.spcflags |= SPCFLAG_STOP;
  236. }
  237.  
  238. #if CPU_LEVEL > 1
  239. static __inline__ uae_u32 get_disp_ea (uae_u32 base, uae_u32 dp)
  240. {
  241.     int reg = (dp >> 12) & 15;
  242.     uae_s32 regd = regs.regs[reg];
  243.     if ((dp & 0x800) == 0)
  244.     regd = (uae_s32)(uae_s16)regd;
  245.     regd <<= (dp >> 9) & 3;
  246.     if (dp & 0x100) {
  247.     uae_s32 outer = 0;
  248.     if (dp & 0x80) base = 0;
  249.     if (dp & 0x40) regd = 0;
  250.  
  251.     if ((dp & 0x30) == 0x20) base += (uae_s32)(uae_s16)nextiword();
  252.     if ((dp & 0x30) == 0x30) base += nextilong();
  253.  
  254.     if ((dp & 0x3) == 0x2) outer = (uae_s32)(uae_s16)nextiword();
  255.     if ((dp & 0x3) == 0x3) outer = nextilong();
  256.  
  257.     if ((dp & 0x4) == 0) base += regd;
  258.     if (dp & 0x3) base = get_long (base);
  259.     if (dp & 0x4) base += regd;
  260.  
  261.     return base + outer;
  262.     } else {
  263.     return base + (uae_s32)((uae_s8)dp) + regd;
  264.     }
  265. }
  266. #else
  267. static __inline__ uae_u32 get_disp_ea (uae_u32 base, uae_u32 dp)
  268. {
  269.     int reg = (dp >> 12) & 15;
  270.     uae_s32 regd = regs.regs[reg];
  271.  
  272.     if ((dp & 0x800) == 0)
  273.     regd = (uae_s32)(uae_s16)regd;
  274.     return base + (uae_s8)dp + regd;
  275. }
  276. #endif
  277.  
  278. extern uae_s32 ShowEA(int reg, amodes mode, wordsizes size, char *buf);
  279.  
  280. extern void MakeSR(void);
  281. extern void MakeFromSR(void);
  282. extern void Exception(int, uaecptr);
  283. extern void dump_counts(void);
  284. extern void m68k_move2c(int, uae_u32 *);
  285. extern void m68k_movec2(int, uae_u32 *);
  286. extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr);
  287. extern void m68k_mull (uae_u32, uae_u32, uae_u16);
  288. extern void init_m68k (void);
  289. extern void m68k_go(int);
  290. extern void m68k_dumpstate(uaecptr *);
  291. extern void m68k_disasm(uaecptr,uaecptr *,int);
  292. extern void m68k_reset(void);
  293.  
  294. extern void mmu_op (uae_u32, uae_u16);
  295.  
  296. extern void fpp_opp (uae_u32, uae_u16);
  297. extern void fdbcc_opp (uae_u32, uae_u16);
  298. extern void fscc_opp (uae_u32, uae_u16);
  299. extern void ftrapcc_opp (uae_u32,uaecptr);
  300. extern void fbcc_opp (uae_u32, uaecptr, uae_u32);
  301. extern void fsave_opp (uae_u32);
  302. extern void frestore_opp (uae_u32);
  303.  
  304. /* Opcode of faulting instruction */
  305. extern uae_u16 last_op_for_exception_3;
  306. /* PC at fault time */
  307. extern uaecptr last_addr_for_exception_3;
  308. /* Address that generated the exception */
  309. extern uaecptr last_fault_for_exception_3;
  310.  
  311. #define CPU_OP_NAME(a) op ## a
  312.  
  313. extern struct cputbl op_smalltbl[];
  314. extern struct cputbl op_direct_smalltbl[];
  315.  
  316. extern cpuop_func *cpufunctbl[65536] ASM_SYM_FOR_FUNC ("cpufunctbl");
  317.  
  318.